|
Autocad VBA : Block einfügen mit geänderten Attributen?
OlliBaer am 19.08.2003 um 18:59 Uhr (0)
Ui, was hat sich denn jetzt getan :-)) bin jetzt zu hause und kann es nicht mehr testen. muss ich aber morgen mal ausprobiere. danke schon mal. an harryk: natürlich wird beim einfügen nach dem einfugepunkt (einfuege) gefragt.:einfuege = ThisDrawing.Utility.GetPoint(, Einfügepunkt wählen ) (s.Forum:block einfuegen?? einmal anders) ;-) und ja, das ganze soll mit meinem raumbuch (EXCEL)verknüpft sein, wenn es denn mal klappt. so soll es dann möglich sein, raumnummern zu vergeben und die anderen daten (temp., ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Block einfügen mit geänderten Attributen?
OlliBaer am 20.08.2003 um 07:56 Uhr (0)
Hi Roland, ne ich glaube excel ist die richtige wahl, da ich die ganzen berechnung auch damit automatisiere und für mich wesentlich flexibler ist. tschau olli
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Block einfügen mit geänderten Attributen?
OlliBaer am 20.08.2003 um 10:00 Uhr (0)
ja, du hast ja recht im bezug auf ne datenbank aber ich brauch excel nicht als datenbank, sondern als berechnungstool... tschau olli
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Block einfügen mit geänderten Attributen?
OlliBaer am 19.08.2003 um 12:56 Uhr (0)
Danke für schnelle antwort, also das zurückschreiben der geänderten attribute in die in der Zeichnungs vorhandenen blöcke funktioniert. ich übergebe an die exceltabelle den blockname und die momentane ID, dadurch kann ich jeden block identifizieren. Ungefähr so (Excel) Blockname Objekt-ID [KG/H] [WATT] [TEMP] [NR] NR3 1074456800 51,55 600 20°C 1 NR3 1074456248 25,78 300 20°C 2 NR3 1074456200 42,96 500 20°C 3 NR3 - 0815 - 0 0 15°C 4 aber wenn ich in der exceltabelle eine ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Block einfügen mit geänderten Attributen?
OlliBaer am 19.08.2003 um 15:05 Uhr (0)
das mach ich ja, aber wie kann ich den soeben eingesetzten block identifizieren?, so dass ich die attribute einlesen bzw. ändern kann. das problem ist: bei der übergabe von excel an acad, wird die tabelle von oben nach unten abgearbeitet. wenn nun 30 blöcke in der tabelle stehen und an der stelle 10 ist ein block der nicht in der zeichnung ist!, wird dieser eingefügt und muss dann geändert werden. danach müssen die blöcke 11-30 weiter geändert werden. Hier werden sie geholfen Olli :-)
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Block einfügen mit geänderten Attributen?
OlliBaer am 21.08.2003 um 07:59 Uhr (0)
@RoSiNiNo Das war genau der Hinweis, der mir fehlte und so einfach... jetzt klappt alles: einfuege = ThisDrawing.Utility.GetPoint(, Bitte den Einfügepunkt für Block & name & wählen ) Set blockref = ThisDrawing.ModelSpace.InsertBlock(einfuege, name, 1, 1, 1, 0) Tatts3 = blockref.GetAttributes alle in Merker2 (Excel) gespeicherten Werte an Tatts3 übergeben in count2 ist die Menge der Attribute gespeichert I = 0 For I = 0 To count2 - 1 Tatts3(I).TextString = Merker2(I + 2) Next blo ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Block einfügen mit geänderten Attributen?
OlliBaer am 19.08.2003 um 11:10 Uhr (0)
Hallo, ich noch mal... ich hab mir ein programm geschrieben, welches mir alle blöcke in der Zeichnung anzeigt, die attribute besitzen. bei bedarf kann man die attribute aller blöcke an excel übergeben, ändern und zurücklesen. manchmal kommt es vor, das ich z.B. eine Teilstrecke (Ts1, 80kg/h, 100Pa/m) vergessen habe und diese nun beim zurücklesen in die zeichnung einsetzen möchte. (bis dahin klappt auch alles) der eizusetzende block müsste aber die geänderten attribute haben. die Frage: wie kann ich einen b ...
|
| In das Form Autocad VBA wechseln |